home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Overload Trio 2
/
Shareware Overload Trio Volume 2 (Chestnut CD-ROM).ISO
/
dir24
/
psi110g.zip
/
TCPCMD.C
< prev
next >
Wrap
C/C++ Source or Header
|
1994-04-17
|
27KB
|
973 lines
/* TCP control and status routines
* Copyright 1991 Phil Karn, KA9Q
*
* Mods by G1EMM
* Mods by WG7J
* Mods by WA3DSP
* Mods by PA0GRI
* Copyright 1992 Gerard J van der Grinten, PA0GRI
*/
#ifdef MSDOS
#include <dos.h>
#endif
#include <ctype.h>
#include "global.h"
#include "timer.h"
#include "mbuf.h"
#include "netuser.h"
#include "internet.h"
#include "iface.h"
#include "tcp.h"
#include "cmdparse.h"
#include "commands.h"
#include "socket.h"
#ifdef TCPACCESS
static int doaccess __ARGS((int argc,char *argv[],void *p));
void addtaccess __ARGS((int32 target,unsigned int bits,int16 low,int16 high,int16 permit));
#endif
static int tcpirtt __ARGS((int argc,char *argv[],void *p));
static int dotcpirtt __ARGS((int argc,char *argv[],void *p));
static int tcpmss __ARGS((int argc,char *argv[],void *p));
static int dotcpmss __ARGS((int argc,char *argv[],void *p));
static int dortt __ARGS((int argc,char *argv[],void *p));
static int dotcpkick __ARGS((int argc,char *argv[],void *p));
static int dotcpreset __ARGS((int argc,char *argv[],void *p));
static int dotcpretries __ARGS((int argc,char *argv[],void *p));
static int tcpretries __ARGS((int argc,char *argv[],void *p));
static int dotcpstat __ARGS((int argc,char *argv[],void *p));
static int dotcptimer __ARGS((int argc,char *argv[],void *p));
static int tcptimer __ARGS((int argc,char *argv[],void *p));
static int dotcptr __ARGS((int argc,char *argv[],void *p));
static int dotcpwindow __ARGS((int argc,char *argv[],void *p));
static int tcpwindow __ARGS((int argc,char *argv[],void *p));
static int dotcpmaxwait __ARGS((int argc,char *argv[],void *p));
static int tcpmaxwait __ARGS((int argc,char *argv[],void *p));
static int dotcpsyndata __ARGS((int argc,char *argv[],void *p));
static int tcpsyndata __ARGS((int argc,char *argv[],void *p));
int doview __ARGS((int argc,char *argv[],void *p));
static int dotcpblimit __ARGS((int argc,char *argv[],void *p));
static int tcpblimit __ARGS((int argc,char *argv[],void *p));
void rxtx_data_compute __ARGS((struct tcb *tcb,int32 *sent,int32 *recvd));
#ifdef TCPACCESS
struct rtaccess *TCPaccess = NULLACCESS; /* access list */
#endif
/* TCP subcommand table */
static struct cmds DFAR Tcpcmds[] = {
#ifdef TCPACCESS
"access", doaccess, 0, 0, NULLCHAR,
#endif
"blimit", dotcpblimit, 0, 0, NULLCHAR,
"irtt", dotcpirtt, 0, 0, NULLCHAR,
"kick", dotcpkick, 0, 2, "tcp kick <tcb>",
"maxwait", dotcpmaxwait, 0, 0, NULLCHAR,
"mss", dotcpmss, 0, 0, NULLCHAR,
"reset", dotcpreset, 0, 2, "tcp reset <tcb>",
"retries", dotcpretries, 0,0, NULLCHAR,
"rtt", dortt, 0, 3, "tcp rtt <tcb> <val>",
"status", dotcpstat, 0, 0, NULLCHAR,
"syndata", dotcpsyndata, 0, 0, NULLCHAR,
"timertype", dotcptimer, 0, 0, NULLCHAR,
"trace", dotcptr, 0, 0, NULLCHAR,
"view", doview, 0, 0, NULLCHAR,
"window", dotcpwindow, 0, 0, NULLCHAR,
NULLCHAR,
};
int
dotcp(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return subcmd(Tcpcmds,argc,argv,p);
}
static int
dotcptr(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setbool(&Tcp_trace,"TCP state tracing",argc,argv);
}
/* Eliminate a TCP connection */
static int
dotcpreset(argc,argv,p)
int argc;
char *argv[];
void *p;
{
register struct tcb *tcb;
tcb = MK_FP(htoi(argv[1]),8);
if(!tcpval(tcb)){
tputs(Notval);
return 1;
}
reset_tcp(tcb);
return 0;
}
/* Set initial round trip time for new connections */
static int
tcpirtt(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setlong((long *)p,"TCP default irtt",argc,argv);
}
static int
dotcpirtt(argc,argv,p)
int argc;
char *argv[];
void *p;
{
struct tcp_rtt *tp;
tcpirtt(argc,argv,(void *)&Tcp_irtt);
if(argc < 2){
for(tp = &Tcp_rtt[0];tp < &Tcp_rtt[RTTCACHE];tp++){
if(tp->addr != 0){
if(tprintf("%s: srtt %lu mdev %lu\n",
inet_ntoa(tp->addr),
tp->srtt,tp->mdev) == EOF)
break;
}
}
}
return 0;
}
/* Set smoothed round trip time for specified TCB */
static int
dortt(argc,argv,p)
int argc;
char *argv[];
void *p;
{
register struct tcb *tcb;
tcb = MK_FP(htoi(argv[1]),8);
if(!tcpval(tcb)){
tputs(Notval);
return 1;
}
tcb->srtt = atol(argv[2]);
return 0;
}
/* Force a retransmission */
static int
dotcpkick(argc,argv,p)
int argc;
char *argv[];
void *p;
{
register struct tcb *tcb;
tcb = MK_FP(htoi(argv[1]),8);
if(kick_tcp(tcb) == -1){
tputs(Notval);
return 1;
}
return 0;
}
/* Set default maximum segment size */
static int
tcpmss(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setshort((unsigned short *)p,"TCP MSS",argc,argv);
}
static int
dotcpmss(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpmss(argc,argv,(void *)&Tcp_mss);
}
/* Set default window size */
static int
tcpwindow(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setshort((unsigned short *)p,"TCP window",argc,argv);
}
static int
dotcpwindow(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpwindow(argc,argv,(void *)&Tcp_window);
}
static int
tcpsyndata(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setbool((int *)p,"TCP syn+data piggybacking",argc,argv);
}
static int
dotcpsyndata(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpsyndata(argc,argv,(void *)&Tcp_syndata);
}
extern int Tcp_retries;
/* Set maximum number of backoffs before resetting the connection */
static int
tcpretries(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setint((int *)p,"max. retries",argc,argv);
}
static int
dotcpretries(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpretries(argc,argv,(void *)&Tcp_retries);
}
extern long Tcp_maxwait;
/* Set maximum retry waittime in ms. */
static int
tcpmaxwait(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setlong((long *)p,"max. retry wait (ms)",argc,argv);
}
static int
dotcpmaxwait(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpmaxwait(argc,argv,(void *)&Tcp_maxwait);
}
extern int Tcp_blimit;
/* Set backoff limit on the connection; from N1BEE */
static int
tcpblimit(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return setint((int *)p,"backoff limit",argc,argv);
}
static int
dotcpblimit(argc,argv,p)
int argc;
char *argv[];
void *p;
{
return tcpblimit(argc,argv,(void *)&Tcp_blimit);
}
#ifdef oldtcpstat
static int tstat __ARGS((void));
/* Display status of TCBs */
static int
dotcpstat(argc,argv,p)
int argc;
char *argv[];
void *p;
{
register struct tcb *tcb;
if(argc < 2){
tstat();
} else {
tcb = MK_FP(htoi(argv[1]),8);
if(!tcpval(tcb))
tputs(Notval);
else
st_tcp(tcb);
}
return 0;
}
/* Dump TCP stats and summary of all TCBs
* &TCB Rcv-Q Snd-Q Local socket Remote socket State
* 1234 0 0 xxx.xxx.xxx.xxx:xxxxx xxx.xxx.xxx.xxx:xxxxx Established
*/
static int
tstat()
{
register int i;
register struct tcb *tcb;
int j;
for(j=i=1;i<=NUMTCPMIB;i++){
if(Tcp_mib[i].name == NULLCHAR)
continue;
tprintf("(%2u)%-20s%10lu",i,Tcp_mib[i].name,
Tcp_mib[i].value.integer);
if(j++ % 2)
tputs(" ");
else
tputc('\n');
}
if((j % 2) == 0)
tputc('\n');
#ifdef UNIX
tputs("&TCB Rcv-Q Snd-Q Local socket Remote socket State\n");
#else
tputs("&TCB Rcv-Q Snd-Q Local socket Remote socket State\n");
#endif
for(tcb=Tcbs;tcb != NULLTCB;tcb = tcb->next){
#ifdef UNIX
tprintf("%8.8x%6u%6u ",FP_SEG(tcb),tcb->rcvcnt,tcb->sndcnt);
#else
tprintf("%4.4x%6u%6u ",FP_SEG(tcb),tcb->rcvcnt,tcb->sndcnt);
#endif
tprintf("%-23s",pinet(&tcb->conn.local));
tprintf("%-23s",pinet(&tcb->conn.remote));
tprintf("%-s",Tcpstates[tcb->state]);
if(tcb->state == TCP_LISTEN && tcb->flags.clone)
tputs(" (S)");
if(tputc('\n') == EOF)
return 0;
}
return 0;
}
#else
/* New tcp stat by Doug Crompton, wa3dsp */
static int tstat __ARGS((int flag));
/* Display status of TCBs */
static int
dotcpstat(argc,argv,p)
int argc;
char *argv[];
void *p;
{
struct tcb *tcb;
if(argc < 2){
tstat(0);
} else {
if (toupper(argv[1][0])=='A') {
tstat(1);
} else {
tcb = MK_FP(htoi(argv[1]),8);
if(!tcpval(tcb))
tputs(Notval);
else
st_tcp(tcb);
}
}
return 0;
}
/* Dump TCP stats and summary of all TCBs
* &TCB Rcv-Q Snd-Q Local socket Remote socket State
* 1234 0 0 xxx.xxx.xxx.xxx:xxxxx xxx.xxx.xxx.xxx:xxxxx Established
*/
static int
tstat(int flag)
{
int i;
struct tcb *tcb;
int j;
for(j=i=1;i<=NUMTCPMIB;i++){
if(Tcp_mib[i].name == NULLCHAR)
continue;
tprintf("(%2u)%-20s%10lu",i,Tcp_mib[i].name,
Tcp_mib[i].value.integer);
if(j++ % 2)
tputs(" ");
else
tputs("\n");
}
if((j % 2) == 0)
tputs("\n");
#ifdef UNIX
tputs("&TCB Rcv-Q Snd-Q Local socket Remote socket State\n");
#else
tputs("&TCB Rcv-Q Snd-Q Local socket Remote socket State\n");
#endif
for(tcb=Tcbs;tcb != NULLTCB;tcb = tcb->next){
if(tcb->state == TCP_LISTEN && !flag)
continue;
#ifdef UNIX
tprintf("%8.8x%6u%6u ",FP_SEG(tcb),tcb->rcvcnt,tcb->sndcnt);
#else
tprintf("%4.4x%6u%6u ",FP_SEG(tcb),tcb->rcvcnt,tcb->sndcnt);
#endif
tprintf("%-23s",pinet(&tcb->conn.local));
tprintf("%-23s",pinet(&tcb->conn.remote));
tprintf("%-s",Tcpstates[tcb->state]);
if(tcb->state == TCP_LISTEN && tcb->flags.clone)
tputs(" (S)");
if(tputs("\n") == EOF)
return 0;
}
return 0;
}
#endif
/* Dump a TCP control block in detail */
void
st_tcp(tcb)
struct tcb *tcb;
{
int32 sent,recvd;
if(tcb == NULLTCB)
return;
rxtx_data_compute(tcb,&sent,&recvd);
tprintf("Local: %s",pinet(&tcb->conn.local));
tprintf(" Remote: %s",pinet(&tcb->conn.remote));
tprintf(" State: %s\n",Tcpstates[tcb->state]);
tputs(" Init seq Unack Next Resent CWind Thrsh Wind MSS Queue Total\n"
"Send:");
tprintf("%9lx",tcb->iss);
tprintf("%9lx",tcb->snd.una);
tprintf("%9lx",tcb->snd.nxt);
tprintf("%7lu",tcb->resent);
tprintf("%6u",tcb->cwind);
tprintf("%6u",tcb->ssthresh);
tprintf("%6u",tcb->snd.wnd);
tprintf("%5u",tcb->mss);
tprintf("%6u",tcb->sndcnt);
tprintf("%11lu\n",sent);
tputs("Recv:");
tprintf("%9lx",tcb->irs);
tputs(" ");
tprintf("%9lx",tcb->rcv.nxt);
tprintf("%7lu",tcb->rerecv);
tputs(" ");
tputs(" ");
tprintf("%6u",tcb->rcv.wnd);
tputs(" ");
tprintf("%6u",tcb->rcvcnt);
tprintf("%11lu\n",recvd);
if(tcb->reseq != (struct reseq *)NULL){
register struct reseq *rp;
tputs("Reassembly queue:\n");
for(rp = tcb->reseq;rp != (struct reseq *)NULL; rp = rp->next){
if(tprintf(" seq x%lx %u bytes\n",
rp->seg.seq,rp->length) == EOF)
return;
}
}
if(tcb->backoff > 0)
tprintf("Backoff %u ",tcb->backoff);
if(tcb->flags.retran)
tputs("Retrying ");
switch(tcb->timer.state){
case TIMER_STOP:
tputs("Timer stopped ");
break;
case TIMER_RUN:
tprintf("Timer running (%ld/%ld ms) ",
(long)read_timer(&tcb->timer),
(long)dur_timer(&tcb->timer));
break;
case TIMER_EXPIRE:
tputs("Timer expired ");
}
tprintf("SRTT %ld ms Mean dev %ld ms\n",tcb->srtt,tcb->mdev);
}
void
rxtx_data_compute(tcb,sent,recvd)
struct tcb *tcb;
int32 *sent;
int32 *recvd;
{
/* Compute total data sent and received; take out SYN and FIN */
*sent = tcb->snd.una - tcb->iss; /* Acknowledged data only */
*recvd = tcb->rcv.nxt - tcb->irs;
switch(tcb->state){
case TCP_LISTEN:
case TCP_SYN_SENT: /* Nothing received or acked yet */
*sent = *recvd = 0;
break;
case TCP_SYN_RECEIVED:
(*recvd)--; /* Got SYN, no data acked yet */
*sent = 0;
break;
case TCP_ESTABLISHED: /* Got and sent SYN */
case TCP_FINWAIT1: /* FIN not acked yet */
(*sent)--;
(*recvd)--;
break;
case TCP_FINWAIT2: /* Our SYN and FIN both acked */
*sent -= 2;
(*recvd)--;
break;
case TCP_CLOSE_WAIT: /* Got SYN and FIN, our FIN not yet acked */
case TCP_CLOSING:
case TCP_LAST_ACK:
(*sent)--;
*recvd -= 2;
break;
case TCP_TIME_WAIT: /* Sent and received SYN/FIN, all acked */
*sent -= 2;
*recvd -= 2;
break;
}
}
/* TCP View Command - D. Crompton 1/92 */
/* Modified for sorted display and */
/* two views - tcp view b|t - 3/92 */
int
doview(argc,argv,p)
int argc;
char *argv[];
void *p;
{
register struct tcb *tcb;
int32 sent,recvd;
int i,j,k=0,vtype;
char *buf;
char temp[80];
if(argc == 1)
vtype = 1;
else {
switch (argv[1][0]) {
case 'b': vtype=1;
break;
case 't': vtype=0;
break;
default: tputs("Use: tcp view <bytes|timers>\n");
return 0;
}
}
for(tcb=Tcbs,i=0;tcb != NULLTCB;tcb = tcb->next){
if(tcb->state == TCP_LISTEN)
continue;
i++;
}
if (i) {
buf=mallocw(i*80);
if (vtype) {
tputs(" Send Send Receive Receive\n" \
"Remote Socket:Port:Local Port/State &TCB Bytes Retries Bytes Retries\n");
} else {
tputs("Remote Socket:Port:Local Port/State &TCB Boff State Timer SRTT\n");
}
for(tcb=Tcbs,j=0;tcb != NULLTCB;tcb = tcb->next){
if(tcb->state == TCP_LISTEN)
continue;
strcpy(temp,pinet(&tcb->conn.remote));
strcat(temp,strstr(pinet(&tcb->conn.local),":"));
strcat(temp,"/");
strcat(temp,Tcpstates[tcb->state]);
temp[37]=0;
k=sprintf(&buf[j],"%-37s",temp);
#ifdef LINUX
k += sprintf(&buf[j + k], "%5lx", tcb);
#else
sprintf(temp,"%8lx",ptol(tcb));
temp[4]=0;
k+=sprintf(&buf[j+k]," %4s",temp);
#endif
if (vtype) {
rxtx_data_compute(tcb,&sent,&recvd);
k+=sprintf(&buf[j+k],"%10lu ",sent);
k+=sprintf(&buf[j+k],"%7lu ",tcb->resent);
k+=sprintf(&buf[j+k],"%10lu ",recvd);
sprintf(&buf[j+k],"%7lu",tcb->rerecv);
} else {
k+=sprintf(&buf[j+k]," %4u",tcb->backoff);
if(tcb->flags.retran)
k+=sprintf(&buf[j+k]," Retry ");
else
k+=sprintf(&buf[j+k]," Try ");
switch(tcb->timer.state) {
case TIMER_STOP:
k+=sprintf(&buf[j+k]," Stopped");
break;
case TIMER_RUN:
k+=sprintf(&buf[j+k]," Run (");
if ((long)dur_timer(&tcb->timer)<10000) {
k+=sprintf(&buf[j+k],"%ld/%ld)ms",
(long)read_timer(&tcb->timer),
(long)dur_timer(&tcb->timer));
} else {
if (((long)read_timer(&tcb->timer)/1000)>9999) {
k+=sprintf(&buf[j+k],">9999/9999)s");
} else {
k+=sprintf(&buf[j+k],"%ld/%ld)s",
(long)read_timer(&tcb->timer)/1000,
(long)dur_timer(&tcb->timer)/1000);
}
}
break;
case TIMER_EXPIRE:
k+=sprintf(&buf[j+k]," Expired");
}
for (;k<73;k++)
buf[j+k]=' ';
if ((tcb->srtt)<10000) {
sprintf(&buf[j+73],"%4ldms",tcb->srtt);
} else {
if ((tcb->srtt/1000)>9999) {
sprintf(&buf[j+73],">9999s");
} else {
sprintf(&buf[j+73],"%4lds",tcb->srtt/1000);
}
}
}
j+=80;
}
#ifdef LINUX
qsort(buf,(size_t)i,80,(int (*) __ARGS((void*,void*))) strcmp);
#else
qsort(buf,(size_t)i,80,(int (*) ()) strcmp);
#endif
for (j=0,k=0;j<i;j++,k+=80) {
tputs(&buf[k]);
if(tputc('\n') == EOF)
return 0;
}
free(buf);
}
return 0;
}
/* tcp timers type - linear v exponential */
static int
tcptimer(argc,argv,p)
int argc ;
char *argv[] ;
void *p ;
{
if (argc < 2) {
tprintf("Tcp timer type is %s\n", *(int *)p ? "linear" : "exponential" ) ;
return 0 ;
}
switch (argv[1][0]) {
case 'l':
case 'L':
*(int *)p = 1 ;
break ;
case 'e':
case 'E':
*(int *)p = 0 ;
break ;
default:
tputs("use: tcp timertype [linear|exponential]\n") ;
return -1 ;
}
return 0 ;
}
extern int tcptimertype;
static int
dotcptimer(argc,argv,p)
int argc ;
char *argv[] ;
void *p ;
{
return tcptimer(argc,argv,(void *)&tcptimertype);
}
#ifdef TCPACCESS
static int
doaccess(argc,argv,p)
int argc;
char *argv[];
void *p;
{
struct iface *ifp;
int32 target;
unsigned bits;
char *bitp;
int16 lport,hport,state;
char *cp; /* for printing the table */
struct rtaccess *tpacc;
struct rtaccess *head;
struct rtaccess *prev;
if(argc == 1){ /* print out the table */
tputs("IP Address Mask Low Port High Port State\n");
for(tpacc = TCPaccess;tpacc != NULLACCESS;tpacc = tpacc->nxtbits){
if(tpacc->target != 0)
cp = inet_ntoa(tpacc->target);
else
cp = "all";
tprintf("%-16s",cp);
tprintf("%4u ",tpacc->bits);
tprintf("%9u",tpacc->lowport);
tprintf("%10u ",tpacc->highport);
if(tpacc->status)
cp = "deny";
else
cp = "permit";
tprintf("%-6s\n",cp);
}
return 0;
}
if(strcmp(argv[1],"permit") == 0){
state = 0;
} else {
if((strcmp(argv[1],"deny") == 0)
|| (strcmp(argv[1],"delete") == 0)){
state = -1;
} else {
tputs(" Format: tcp access <permit|deny|delete> <dest addr>[/<bits>] [lowport [highport]]\n");
return 1;
}
}
if(strcmp(argv[2],"all") == 0){
target = 0;
bits = 0;
} else {
/* If IP address is followed by an optional slash and
* a length field, (e.g., 128.96/16) get it;
* otherwise assume a full 32-bit address
*/
if((bitp = strchr(argv[2],'/')) != NULLCHAR){
/* Terminate address token for resolve() call */
*bitp++ = '\0';
bits = atoi(bitp);
} else
bits = 32;
if((target = resolve(argv[2])) == 0){
tprintf(Badhost,argv[2]);
return 1;
}
}
if(argc > 3){
if(strcmp(argv[3],"all") == 0){
lport = 1;
hport = 65534L;
} else {
lport = atoi(argv[3]);
hport = lport;
}
} else {
lport = 0;
hport = 0;
}
if(argc > 4)
hport = atoi(argv[4]);
if(strcmp(argv[1],"delete") == 0){
prev = NULLACCESS;
head = tpacc = TCPaccess;
while(tpacc != NULLACCESS){
head = tpacc;
tpacc = tpacc->nxtbits;
if((head->target == target) &&
(head->bits == bits) &&
(head->lowport == lport) &&
(head->highport == hport)) { /*match*/
/*now delete. watch for special cases*/
if(head == TCPaccess) /* first in chain */
TCPaccess = head->nxtbits;
else
/*
sanity check: we cant get here with
prev == NULLACCESS !!
*/
prev->nxtbits = tpacc;
free(head);
return 0;
}
prev = head;
}
tputs("Not found.\n");
return 1;
}
/* add the access */
addtaccess(target,bits,lport,hport,state);
return 0;
}
/* add an entry to the access control list */
/* not a lot of error checking 8-) */
void
addtaccess(target,bits,low,high,permit)
int32 target; /* Target IP address prefix */
unsigned int bits; /* Size of target address prefix in bits (0-32) */
int16 low;
int16 high;
int16 permit;
{
struct rtaccess *tpacc; /*temporary*/
struct rtaccess *holder; /*for the new record*/
holder = (struct rtaccess *)callocw(1,sizeof(struct rtaccess));
holder->nxtiface = NULLACCESS;
holder->nxtbits = NULLACCESS;
holder->target = target;
holder->bits = bits;
holder->lowport = low;
holder->highport = high;
holder->status = permit;
if((tpacc = TCPaccess) == NULLACCESS){
TCPaccess = holder;
} else {
while(tpacc->nxtbits != NULLACCESS)
tpacc = tpacc->nxtbits;
tpacc->nxtbits = holder;
}
}
/* check to see if port is "authorized". Returns 0 if matching permit record
is found or no access records exists, -1 if not found or deny record found */
int
tcp_check(accptr,src,port)
struct rtaccess *accptr;
int32 src;
int16 port;
{
unsigned long mask;
if(accptr == NULLACCESS)
return 0; /* no access control */
for(;accptr != NULLACCESS;accptr = accptr->nxtbits) {
mask = ~0L << (32 - accptr->bits);
if(( accptr->target == (mask & src)) &&
((( port >= accptr->lowport ) && (port <= accptr->highport))
|| (!accptr->lowport))){
return (accptr->status);
}
}
return -1; /* fall through to here if not found */
}
#endif
/* These are the interface dependent tcp parameters */
static int doiftcpblimit __ARGS((int argc,char *argv[],void *p));
static int doiftcpirtt __ARGS((int argc,char *argv[],void *p));
static int doiftcpmaxwait __ARGS((int argc,char *argv[],void *p));
static int doiftcpretries __ARGS((int argc,char *argv[],void *p));
static int doiftcptimertype __ARGS((int argc,char *argv[],void *p));
static int doiftcpwindow __ARGS((int argc,char *argv[],void *p));
static int doiftcpsyndata __ARGS((int argc,char *argv[],void *p));
static int doiftcpmss __ARGS((int argc,char *argv[],void *p));
struct cmds DFAR Iftcpcmds[] = {
"blimit", doiftcpblimit, 0, 0, NULLCHAR,
"irtt", doiftcpirtt, 0, 0, NULLCHAR,
"maxwait", doiftcpmaxwait, 0, 0, NULLCHAR,
"mss", doiftcpmss, 0, 0, NULLCHAR,
"retries", doiftcpretries, 0, 0, NULLCHAR,
"syndata", doiftcpsyndata, 0, 0, NULLCHAR,
"timertype",doiftcptimertype,0,0, NULLCHAR,
"window", doiftcpwindow, 0, 0, NULLCHAR,
NULLCHAR
};
int doiftcp(int argc, char *argv[],void *p) {
if(!p)
return 0;
return subcmd(Iftcpcmds,argc,argv,p);
}
int doiftcpblimit(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpblimit(argc,argv,(void *)&ifp->tcp->blimit);
}
int doiftcpirtt(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpirtt(argc,argv,(void *)&ifp->tcp->irtt);
}
int doiftcpmaxwait(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpmaxwait(argc,argv,(void *)&ifp->tcp->maxwait);
}
int doiftcpmss(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpmss(argc,argv,(void *)&ifp->tcp->mss);
}
int doiftcpretries(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpretries(argc,argv,(void *)&ifp->tcp->retries);
}
int doiftcptimertype(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcptimer(argc,argv,(void *)&ifp->tcp->timertype);
}
int doiftcpwindow(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpwindow(argc,argv,(void *)&ifp->tcp->window);
}
int doiftcpsyndata(int argc,char *argv[],void *p) {
struct iface *ifp = p;
return tcpsyndata(argc,argv,(void *)&ifp->tcp->syndata);
}
void init_iftcp(struct iftcp *tcp) {
tcp->blimit = Tcp_blimit;
tcp->maxwait = Tcp_maxwait;
tcp->window = Tcp_window;
tcp->mss = Tcp_mss;
tcp->irtt = Tcp_irtt;
tcp->retries = Tcp_retries;
tcp->timertype = tcptimertype;
tcp->syndata = Tcp_syndata;
}